home *** CD-ROM | disk | FTP | other *** search
/ Aminet 25 / Aminet 25 (1998)(GTI - Schatztruhe)[!][Jun 1998].iso / Aminet / game / data / OboyWorms.lha / OboyWorms / OboyWorms.Install < prev   
Encoding:
Text File  |  1998-04-11  |  782 b   |  36 lines
  1. ; OboyWorms Install-script 1.00
  2.  
  3.  
  4.     (message "This script will install OboyWorms to\n"
  5.              "The selected device or drawer!\n"
  6.              ">-----------------------------<\n"
  7.              "Copyright 1998\n Martin Persson\nmartin5@swipnet.se\nAnd\nLennart Johannesson\n95lenjo@ostrabo.uddevalla.se\n")
  8.  
  9.     (complete 0)
  10.  
  11.  
  12.     (set dest_dir
  13.       (tackon (askdir
  14.                 (prompt "Take me to the WormsDC/TWSAMPLES directory\n")
  15.                 (help @askdir-help)
  16.                 (default "ram:")
  17.                 (disk)
  18.               )
  19.               "OboyWorms"
  20.       )
  21.     )
  22.  
  23.     (set @default-dest dest_dir)
  24.     (makedir dest_dir)
  25.  
  26.     (complete 50)
  27.  
  28.     (copyfiles
  29.       (source "OboyWorms")
  30.       (dest dest_dir)
  31.       (all)
  32.     )
  33.  
  34.     (complete 100)
  35.     (exit)
  36.